home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / sharewar / Slunec / app / pspads.exe / {app} / Context / Pascal.DEF < prev   
Encoding:
Text File  |  2001-07-30  |  2.1 KB  |  153 lines
  1. ; Tento soubor obsahuje kontextovou nßpov∞du pro program PSPad
  2. ; a zv²raz≥ovaΦ syntaxe pro Object Pascal
  3. ;
  4. ; ╪ßdky zaΦφnajφcφ st°ednφkem a prßzdnΘ °ßdky jsou ignorovßny
  5. ;
  6. ; Formßt p°φkaz∙ :
  7. ; [jmΘno_p°φkazu | popis p°φkazu (libovoln² text) ]
  8. ; °ßdek p°φkazu, kter² bude vlo₧en 
  9. ; °ßdek p°φkazu, kter² bude vlo₧en ...
  10. ; 
  11. ; hlaviΦka p°φkazu je uzav°ena do [], znak | slou₧φ jako odd∞lovaΦ
  12. ; jmΘna p°φkazu a komentß°e
  13. ; pokud °ßdek p°φkazu obsahuje znak |, kurzor se po vlo₧enφ do
  14. ; textu zastavφ na tomto mφst∞
  15. ;
  16. ; Jak vidφte, nenφ problΘm napsat Üablonu t°eba na kostru programu
  17. ;
  18. ; autor: Borand - p°evzato z Delphi5
  19. ;
  20. [arrayd | array declaration (var)]
  21. array[0..|] of ;
  22.  
  23. [arrayc | array declaration (const)]
  24. array[0..|] of = ();
  25.  
  26. [cases | case statement]
  27. case | of
  28.   : ;
  29.   : ;
  30. end;
  31.   
  32. [casee | case statement (with else)]
  33. case | of
  34.   : ;
  35.   : ;
  36. else ;
  37. end;
  38.   
  39. [classf | class declaration (all parts)]
  40. T| = class(T)
  41. private
  42.  
  43. protected
  44.  
  45. public
  46.  
  47. published 
  48.  
  49. end;
  50.  
  51. [classd | class declaration (no parts)]
  52. T| = class(T)
  53.  
  54. end;
  55.  
  56. [classc | class declaration (with Create/Destroy overrides)]
  57. T| = class(T)
  58. private
  59.  
  60. protected
  61.  
  62. public
  63.   constructor Create; override;
  64.   destructor Destroy; override;
  65. published 
  66.  
  67. end;
  68.  
  69. [fors | for (no begin/end)]
  70. for | :=  to  do
  71.  
  72. [forb | for statement]
  73. for | :=  to  do
  74. begin
  75.  
  76. end;
  77.  
  78. [function | function declaration]
  79. function |(): ;
  80. begin
  81.  
  82. end;
  83.  
  84. [ifs | if (no begin/end)]
  85. if | then
  86.  
  87. [ifb | if statement]
  88. if | then
  89. begin
  90.  
  91. end;
  92.  
  93. [ife | if then (no begin/end) else (no begin/end)]
  94. if | then
  95.  
  96. else
  97.  
  98. [ifeb | if then else]
  99. if | then
  100. begin
  101.  
  102. end
  103. else
  104. begin
  105.  
  106. end;
  107.  
  108. [procedure | procedure declaration]
  109. procedure |();
  110. begin
  111.  
  112. end;
  113.  
  114. [trye | try except]
  115. try
  116.   | 
  117. except
  118.  
  119. end;
  120.  
  121. [tryf | try finally]
  122. try
  123.   | 
  124. finally
  125.  
  126. end;
  127.  
  128. [trycf | try finally (with Create/Free)]
  129. |variable := typename.Create; 
  130. try
  131.  
  132. finally
  133.   variable.Free;
  134. end;
  135.  
  136. [whileb | while statement]
  137. while | do
  138. begin
  139.  
  140. end;
  141.  
  142. [whiles | while (no begin)]
  143. while | do
  144.  
  145. [withb | with statement]
  146. with | do
  147. begin
  148.  
  149. end;
  150.  
  151. [withs | with (no begin)]
  152. with | do
  153.